home *** CD-ROM | disk | FTP | other *** search
/ The Games Machine 76 / XENIATGM66.iso / Indiana Jones / Indiana Jones.exe / RESOURCE / PREVIEW.GOB / cog_gen_moveobj.cog < prev    next >
Text File  |  1999-11-15  |  4KB  |  186 lines
  1. # Jones 3D Cog Script
  2. #
  3. # gen_MoveObj.cog
  4. #
  5. #
  6. # A hack for pushing blocks around. Inspired by Reed Derleth
  7. # 
  8. # IMPORTANT. Make sure you attach the cog to a valid object.
  9. # Make sure that the ghostthing is assigned to a ghost object.
  10. #
  11. # Usage:
  12. # -Get behind the object (face the direction you want it to go)
  13. # -Activate once to push forward.
  14. # -Activate twice rapidly to pull. (the object will materialise on top of you just walk forward)
  15. # -You can teleport things out of the world so be careful
  16. #
  17. # [SXC]
  18. #
  19. # (C) 1998 LucasArts Entertainment Co. All Rights Reserved
  20. # ========================================================================================
  21.  
  22. symbols
  23.     message  startup
  24.     message  activate
  25.     message    timer
  26.  
  27.     vector   playervec            local
  28.     vector   dudpyrvec            local
  29.     vector   origvec              local
  30.     vector   newthingvec          local
  31.     vector   newvector            local
  32.  
  33.     template ghostthing = ghost
  34.  
  35.     thing    player0              local
  36.     thing    pushobj
  37.     thing    newposthing          local
  38.  
  39.     int      direction =     0     local
  40.     int        pullFlag =         0        local
  41.  
  42.     float    playery =         0     local
  43.     float    playerx =         0     local
  44.     float    xpos =             0     local
  45.     float    ypos =             0     local
  46.     float    zpos =             0     local
  47.     float        timeSpan=        
  48.  
  49.     sector   gensector            local
  50.  
  51. end
  52.  
  53.  
  54. # ========================================================================================
  55.  
  56. code
  57.  
  58. startup:
  59.     dudpyrvec = VectorSet(0, 0, 0);
  60.     return;
  61.  
  62. # ........................................................................................
  63.  
  64. activate:
  65.     pullFlag = pullFlag + 1;
  66.     SetTimer(timeSpan);    
  67.     playervec = GetThingLVec(player0);
  68.     playery = VectorY(playervec);
  69. //    printflex(playery);
  70.     playerx = VectorX(playervec);
  71. //    printflex(playerx);
  72.  
  73.     if ((playery > 0) &&
  74.         ((playerx > -0.7) && (playerx < 0.7))) {
  75.             direction = 1;                               //north
  76.             //print("reached 1 north");
  77.         }
  78.     else if ((playery < 0) &&
  79.               ((playerx > -0.7) && (playerx < 0.7))) {
  80.                   direction = 3;                          //south
  81.                  //print("reached 2 south");
  82.               }
  83.     else if ((playerx > 0) &&
  84.               ((playery > -0.7) && (playery < 0.7))) {
  85.                   direction = 2;                          //east
  86.                   //print("reached 3 east");
  87.               }
  88.     else if ((playerx < 0) &&
  89.               ((playery > -0.7) && (playery < 0.7))) {
  90.                   direction = 4;                          //west
  91.                   //print("reached 4 west");
  92.     }
  93.  
  94.     //print("direction is");
  95.     //printint(direction);
  96.     pushobj = GetSenderRef();                          //get vectors
  97.     origvec = GetThingPos(pushobj);
  98.     gensector = GetThingSector(pushobj);
  99.  
  100.     xpos = VectorX(origvec);                           //get positions
  101.     //printflex(xpos);
  102.     ypos = Vectory(origvec);
  103.     //printflex(ypos);
  104.     zpos = Vectorz(origvec);
  105.     //printflex(zpos);
  106.  
  107.     return;
  108.  
  109.     # .....................................................................................
  110.  
  111.     timer:
  112.  
  113.         //print("reached timer");
  114.         if (pullFlag == 2)
  115.         {
  116.             if (direction == 1)
  117.          {
  118.              ypos = ypos - 0.2;
  119.              //print("move South");
  120.              //printint(ypos);
  121.          }
  122.          else if (direction == 2)
  123.        {
  124.              xpos = xpos - 0.2;
  125.              //print("move West");
  126.              //printint(xpos);
  127.          }
  128.          else if (direction == 3)
  129.        {
  130.           ypos = ypos + 0.2;
  131.              //print("move North");
  132.              //printint(xpos);          
  133.          }
  134.          else if (direction == 4)
  135.        {
  136.           xpos = xpos + 0.2;
  137.              //print("move East");
  138.              //printint(ypos);            
  139.          }    
  140.         }
  141.         else if (pullFlag == 1)
  142.         {
  143.             if (direction == 1)
  144.             {
  145.                 ypos = ypos + 0.2;
  146.                //print("move North");
  147.                 //printint(xpos);
  148.             }
  149.             else if (direction == 2)
  150.          {
  151.                 xpos = xpos + 0.2;
  152.                 //print("move East");
  153.                 //printint(ypos);
  154.             }
  155.             else if (direction == 3)
  156.          {
  157.                 ypos = ypos - 0.2;
  158.                 //print("move South");
  159.                 //printint(ypos);
  160.             }
  161.             else if (direction == 4)
  162.          {
  163.                 xpos = xpos - 0.2;
  164.                 //print("move West");
  165.                 //printint(xpos);
  166.             }
  167.       }
  168.     direction = 0;
  169.     pullFlag = 0;
  170.     newvector = VectorSet(xpos, ypos, zpos);
  171.     newposthing = CreateThingAtPos(ghostthing, gensector, newvector, dudpyrvec);
  172.     TeleportThing(pushobj, newposthing);
  173.     DestroyThing(newposthing);
  174.  
  175.     return;
  176.  
  177.     end
  178.  
  179.  
  180.  
  181.  
  182.  
  183.  
  184.  
  185.  
  186.